(Man-getpage-in-background): Copy process-environment

so we only alter the copy.

diff --git a/lisp/man.el b/lisp/man.el
index 60252c925619ff0b61d3c4d928557406725f14f9..cca12f51dc8b3e33f79deb3ac11913e0bb5f65a6 100644 (file)
--- a/lisp/man.el
+++ b/lisp/man.el
@@ -428,7 +428,7 @@ start a background process even if a buffer already exists and
        (Man-notify-when-ready buffer)
       (message "Invoking man %s in background..." man-args)
       (setq buffer (generate-new-buffer bufname))
-      (let ((process-environment process-environment))
+      (let ((process-environment (copy-sequence process-environment)))
        ;; Prevent any attempt to use display terminal fanciness.
        (setenv "TERM" "dumb")
        (set-process-sentinel